home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-01 / wlib11_2.zip / EXAMPLES.EXE / EXAM15.C < prev    next >
Text File  |  1991-03-13  |  602b  |  23 lines

  1.   #include "window.h"
  2.   #define NORM   CREATE_VIDEO_ATTRIBUTE(black,white)
  3.  
  4.   WPOINTER w;
  5.  
  6.  
  7.   main()
  8.   {
  9.     WindowInitializeSystem();
  10.     WindowSaveInitial(0);
  11.     w = WindowInitialize(BORDER,1,1,20,10,NORM,NORM,SINGLEBOX);
  12.     WindowOpen(w);
  13.     WindowDisplay(w,1,NOEFFECT);
  14.     GET_KEY();
  15.     WindowWriteStringRJ(w,"This",1,10);
  16.     WindowWriteStringRJ(w,"is",2,10);
  17.     WindowWriteStringRJ(w,"right",3,10);
  18.     WindowWriteStringRJ(w,"justified",4,10);
  19.     WindowWriteStringRJ(w,"on ",5,10);
  20.     WindowWriteStringRJ(w,"column",6,10);
  21.     WindowWriteStringRJ(w,"10",7,10);
  22.   }
  23.